home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
How Would You Survive?
/
How Would You Survive (1995)(Grolier)[Mac-PC].iso
/
mac
/
SHARED.DIR
/
01958_Script_BASIC FACTS
< prev
next >
Wrap
Text File
|
1995-09-13
|
5KB
|
176 lines
Global gBtn1, gBtn2, gBtn3, gBtn4, gBtn5, gBtn6, gBtn7, gBtn8, gBtn9, ¼
gBtn16, gBtn17, gBtn18, gNewMarker, gBtnBF1, gBtnBF2, gBtnBF3, gBtnBF4, gBtnBF5, ¼
gBtnBF6, gBtnBF7, gBtnBF8, gBtnBF9, gBtnBF10, gBtnBF11, gBtnBF12,gTheHelpIsOn
on BFSetUp
set ScriptNumber = the number of cast "a3StateButton"
set gBtnBF1 = birth(script ScriptNumber, 4, 175, 0, "BF01", "HandCursor")
set gBtnBF2 = birth(script ScriptNumber, 5, 179, 0, "BF02", "HandCursor")
set gBtnBF3 = birth(script ScriptNumber, 6, 183, 0, "BF03", "HandCursor")
set gBtnBF4 = birth(script ScriptNumber, 7, 187, 0, "BF04", "HandCursor")
set gBtnBF5 = birth(script ScriptNumber, 8, 191, 0, "BF05", "HandCursor")
set gBtnBF6 = birth(script ScriptNumber, 9, 195, 0, "BF06", "HandCursor")
set gBtnBF7 = birth(script ScriptNumber, 10, 199, 0, "BF07", "HandCursor")
set gBtnBF8 = birth(script ScriptNumber, 11, 203, 0, "BF08", "HandCursor")
set gBtnBF9 = birth(script ScriptNumber, 12, 207, 0, "BF09", "HandCursor")
set gBtnBF10 = birth(script ScriptNumber, 13, 211, 0, "BF10", "HandCursor")
set gBtnBF11 = birth(script ScriptNumber, 14, 215, 0, "BF11", "HandCursor")
set gBtnBF12 = birth(script ScriptNumber, 15, 219, 0, "BF12", "HandCursor")
end
on VGlobalBFRollover
if (the MouseV < 250) then
if hilightPullDown (gBtn1) then exit
if hilight (gBtn17) then exit
if hilight (gBtn16) then exit
if hilight (gBtnBF1) then exit
if hilight (gBtnBF2) then exit
if hilight (gBtnBF3) then exit
if hilight (gBtnBF4) then exit
if hilight (gBtnBF5) then exit
if hilight (gBtnBF6) then
exit
end if
else
if rollover(38) then
if gTheHelpIsOn = 1 then
puppetsound "SV142100.AIF"
updatestage
repeat while rollover(38)
nothing
end repeat
end if
puppetsound 0
end if
if hilight (gBtn2) then exit
if hilight (gBtn3) then exit
if hilight (gBtn4) then exit
if hilight (gBtn5) then exit
if hilight (gBtn6) then exit
if hilight (gBtn7) then exit
if hilight (gBtn8) then exit
if hilight (gBtn9) then exit
if hilight (gBtnBF7) then exit
if hilight (gBtnBF8) then exit
if hilight (gBtnBF9) then exit
if hilight (gBtnBF10) then exit
if hilight (gBtnBF11) then exit
if hilight (gBtnBF12) then exit
end if
end
on EGlobalBFRollover
if (the MouseV < 250) then
if hilightPullDown (gBtn1) then exit
if hilight (gBtn17) then exit
if hilight (gBtn18) then exit
if hilight (gBtnBF1) then exit
if hilight (gBtnBF2) then exit
if hilight (gBtnBF3) then exit
if hilight (gBtnBF4) then exit
if hilight (gBtnBF5) then exit
if hilight (gBtnBF6) then
exit
end if
else
if rollover(38) then
if gTheHelpIsOn = 1 then
puppetsound "SE142100.AIF"
updatestage
repeat while rollover(38)
nothing
end repeat
end if
puppetsound 0
end if
if hilight (gBtn2) then exit
if hilight (gBtn3) then exit
if hilight (gBtn4) then exit
if hilight (gBtn5) then exit
if hilight (gBtn6) then exit
if hilight (gBtn7) then exit
if hilight (gBtn8) then exit
if hilight (gBtn9) then exit
if hilight (gBtnBF7) then exit
if hilight (gBtnBF8) then exit
if hilight (gBtnBF9) then exit
if hilight (gBtnBF10) then exit
if hilight (gBtnBF11) then exit
if hilight (gBtnBF12) then exit
end if
end
on AGlobalBFRollover
if (the MouseV < 250) then
if hilightPullDown (gBtn1) then exit
if hilight (gBtn16) then exit
if hilight (gBtn18) then exit
if hilight (gBtnBF1) then exit
if hilight (gBtnBF2) then exit
if hilight (gBtnBF3) then exit
if hilight (gBtnBF4) then exit
if hilight (gBtnBF5) then exit
if hilight (gBtnBF6) then
exit
end if
else
if rollover(38) then
if gTheHelpIsOn = 1 then
puppetsound "SA142100.AIF"
updatestage
repeat while rollover(38)
nothing
end repeat
end if
puppetsound 0
end if
if hilight (gBtn2) then exit
if hilight (gBtn3) then exit
if hilight (gBtn4) then exit
if hilight (gBtn5) then exit
if hilight (gBtn6) then exit
if hilight (gBtn7) then exit
if hilight (gBtn8) then exit
if hilight (gBtn9) then exit
if hilight (gBtnBF7) then exit
if hilight (gBtnBF8) then exit
if hilight (gBtnBF9) then exit
if hilight (gBtnBF10) then exit
if hilight (gBtnBF11) then exit
if hilight (gBtnBF12) then exit
end if
end
on BFKill
WatchCursor
hideControl (gBtnBF1)
hideControl (gBtnBF2)
hideControl (gBtnBF3)
hideControl (gBtnBF4)
hideControl (gBtnBF5)
hideControl (gBtnBF6)
hideControl (gBtnBF7)
hideControl (gBtnBF8)
hideControl (gBtnBF9)
hideControl (gBtnBF10)
hideControl (gBtnBF11)
hideControl (gBtnBF12)
set gBtnBF1 = 0
set gBtnBF2 = 0
set gBtnBF3 = 0
set gBtnBF4 = 0
set gBtnBF5 = 0
set gBtnBF6 = 0
set gBtnBF7 = 0
set gBtnBF8 = 0
set gBtnBF9 = 0
set gBtnBF10 = 0
set gBtnBF11 = 0
set gBtnBF12 = 0
end
on resetBF
go "BFStart"
end